﻿Public Class DocumentoCliente
    Dim _CIA, _SUC, _TDOC As String
    Dim _DCICOD, _CODCLI, _CODVEN, _MONCOD, _TDOCOD, _CNVCOD As String
    Dim _FOPCOD, _AGECOD, _DCIOBS, _DCIOBSCRE, _DCIDIRENT As String
    Dim _DCIEST As String, _CLENCOD As String
    Dim _DCIFECHA, _DCIULTMOD As String
    Dim _DCITOTBRU, _DCITOTDESCTO, _DCITOTNET, _DCIIGV, _DCITOT As Decimal
    Dim _DCIOFIC, _DCIMUES, _PERCONF, _PERREC As String
    Dim _ATSCOD As String
    Dim _BANCOD, _NRODEP, _RAZCOT As String
    Dim _CLIMAR As String
    Dim _FECENT As String
    Dim _USUCOD As String

    Sub New()

    End Sub

    Sub New(ByVal cia As String, ByVal suc As String, ByVal tdo As String, ByVal DCIcod As String, _
            ByVal clicod As String, ByVal vencod As String, ByVal moncod As String, ByVal tdocod As String, _
            ByVal cnvcod As String, ByVal fopcod As String, ByVal agecod As String, ByVal DCItotbru As Decimal, _
            ByVal DCItotdescto As Decimal, ByVal DCItotnet As Decimal, ByVal DCIigv As Decimal, _
            ByVal DCItot As Decimal, ByVal DCIobs As String, ByVal DCIobscre As String, ByVal DCIdirent As String, _
            ByVal DCIest As String, ByVal clencod As String, ByVal fecent As String, ByVal ofic As String, _
    ByVal mues As String, ByVal persCOnf As String, ByVal persRec As String, ByVal atscod As String, _
    ByVal bancod As String, ByVal nrodep As String, ByVal razcot As String, ByVal dcifec As String, ByVal usucod As String)
        Me._CIA = cia
        Me._SUC = suc
        Me._TDOC = tdo
        Me._DCICOD = DCIcod
        Me._CODCLI = clicod
        Me._CODVEN = vencod
        Me._MONCOD = moncod
        Me._TDOCOD = tdocod
        Me._CNVCOD = cnvcod
        Me._FOPCOD = fopcod
        Me._AGECOD = agecod
        Me._DCITOTBRU = DCItotbru
        Me._DCITOTDESCTO = DCItotdescto
        Me._DCITOTNET = DCItotnet
        Me._DCIIGV = DCIigv
        Me._DCITOT = DCItot
        Me._DCIOBS = DCIobs
        Me._DCIOBSCRE = DCIobscre
        Me._DCIDIRENT = DCIdirent
        Me._DCIEST = DCIest
        Me._CLENCOD = clencod
        Me._FECENT = fecent
        Me._DCIOFIC = ofic
        Me._DCIMUES = mues
        Me._PERCONF = persCOnf
        Me._PERREC = persRec
        Me._ATSCOD = atscod
        Me._BANCOD = bancod
        Me._NRODEP = nrodep
        Me._RAZCOT = razcot
        Me._DCIFECHA = dcifec
        Me._USUCOD = usucod
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(ByVal value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC
        End Get
        Set(ByVal value As String)
            _SUC = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC
        End Get
        Set(ByVal value As String)
            _TDOC = value
        End Set
    End Property

    Public Property DCI_Codigo() As String
        Get
            Return _DCICOD
        End Get
        Set(ByVal value As String)
            _DCICOD = value
        End Set
    End Property

    Public Property DCI_Fecha() As Date
        Get
            Return _DCIFECHA
        End Get
        Set(ByVal value As Date)
            _DCIFECHA = value
        End Set
    End Property

    Public Property CLI_Codigo() As String
        Get
            Return _CODCLI
        End Get
        Set(ByVal value As String)
            _CODCLI = value
        End Set
    End Property

    Public Property VEN_Codigo() As String
        Get
            Return _CODVEN
        End Get
        Set(ByVal value As String)
            _CODVEN = value
        End Set
    End Property

    Public Property MON_Codigo() As String
        Get
            Return _MONCOD
        End Get
        Set(ByVal value As String)
            _MONCOD = value
        End Set
    End Property

    Public Property TDO_Codigo() As String
        Get
            Return _TDOCOD
        End Get
        Set(ByVal value As String)
            _TDOCOD = value
        End Set
    End Property

    Public Property CNV_Codigo() As String
        Get
            Return _CNVCOD
        End Get
        Set(ByVal value As String)
            _CNVCOD = value
        End Set
    End Property

    Public Property FOP_Codigo() As String
        Get
            Return _FOPCOD
        End Get
        Set(ByVal value As String)
            _FOPCOD = value
        End Set
    End Property

    Public Property AGE_Codigo() As String
        Get
            Return _AGECOD
        End Get
        Set(ByVal value As String)
            _AGECOD = value
        End Set
    End Property

    Public Property DCI_TotalBruto() As Decimal
        Get
            Return _DCITOTBRU
        End Get
        Set(ByVal value As Decimal)
            _DCITOTBRU = value
        End Set
    End Property

    Public Property DCI_TotaDsct() As Decimal
        Get
            Return _DCITOTDESCTO
        End Get
        Set(ByVal value As Decimal)
            _DCITOTDESCTO = value
        End Set
    End Property

    Public Property DCI_TotalNeto() As Decimal
        Get
            Return _DCITOTNET
        End Get
        Set(ByVal value As Decimal)
            _DCITOTNET = value
        End Set
    End Property

    Public Property DCI_IGV() As Decimal
        Get
            Return _DCIIGV
        End Get
        Set(ByVal value As Decimal)
            _DCIIGV = value
        End Set
    End Property

    Public Property DCI_Total() As Decimal
        Get
            Return _DCITOT
        End Get
        Set(ByVal value As Decimal)
            _DCITOT = value
        End Set
    End Property

    Public Property DCI_UltModificacion() As String
        Get
            Return _DCIULTMOD
        End Get
        Set(ByVal value As String)
            _DCIULTMOD = value
        End Set
    End Property

    Public Property DCI_Observaciones() As String
        Get
            Return _DCIOBS
        End Get
        Set(ByVal value As String)
            _DCIOBS = value
        End Set
    End Property

    Public Property DCI_OBSCredito() As String
        Get
            Return _DCIOBSCRE
        End Get
        Set(ByVal value As String)
            _DCIOBSCRE = value
        End Set
    End Property

    Public Property DCI_DireccionEntrega() As String
        Get
            Return _DCIDIRENT
        End Get
        Set(ByVal value As String)
            _DCIDIRENT = value
        End Set
    End Property

    Public Property DCI_Estado() As String
        Get
            Return _DCIEST
        End Get
        Set(ByVal value As String)
            _DCIEST = value
        End Set
    End Property

    Public Property CLEN_Codigo() As String
        Get
            Return _CLENCOD
        End Get
        Set(ByVal value As String)
            _CLENCOD = value
        End Set
    End Property

    Public Property FEC_Entrega() As String
        Get
            Return _FECENT
        End Get
        Set(ByVal value As String)
            _FECENT = value
        End Set
    End Property

    Public Property DCI_Oficina() As String
        Get
            Return _DCIOFIC
        End Get
        Set(ByVal value As String)
            _DCIOFIC = value
        End Set
    End Property

    Public Property DCI_Muestra() As String
        Get
            Return _DCIMUES
        End Get
        Set(ByVal value As String)
            _DCIMUES = value
        End Set
    End Property

    Public Property PERS_Recibe() As String
        Get
            Return _PERREC
        End Get
        Set(ByVal value As String)
            _PERREC = value
        End Set
    End Property

    Public Property PERS_Confirma() As String
        Get
            Return _PERCONF
        End Get
        Set(ByVal value As String)
            _PERCONF = value
        End Set
    End Property

    Public Property ATS_Codigo() As String
        Get
            Return _ATSCOD
        End Get
        Set(ByVal value As String)
            _ATSCOD = value
        End Set
    End Property

    Public Property BAN_Codigo() As String
        Get
            Return _BANCOD
        End Get
        Set(ByVal value As String)
            _BANCOD = value
        End Set
    End Property

    Public Property NRO_Deposito() As String
        Get
            Return _NRODEP
        End Get
        Set(ByVal value As String)
            _NRODEP = value
        End Set
    End Property

    Public Property DCI_RazonCot() As String
        Get
            Return _RAZCOT
        End Get
        Set(ByVal value As String)
            _RAZCOT = value
        End Set
    End Property

    Public Property USU_Codigo() As String
        Get
            Return _USUCOD
        End Get
        Set(ByVal value As String)
            _USUCOD = value
        End Set
    End Property

End Class
